0 PRINT"[147]":
1 POKE53272,24
10 A=12288:B=1:C=1024:D=64:F=7
30 IFB=9THENF=3:REM I
31 IFB=27THENF=3:REM .
32 IFB=28THENF=4:REM ,
33 IFB=29THENF=3:REM !
34 IFB=30THENF=3:REM '
39 E=0:FORI=0TO7
40 FORX=0TOF
50 POKEC+I*40+X,PEEK(A+(B*D)+E):E=E+1
60 NEXTX
70 NEXTI
80 POKE198,0:WAIT198,1:PRINT"[147]";
90 B=B+1:F=7:GOTO30